home *** CD-ROM | disk | FTP | other *** search
/ The Fatted Calf / The Fatted Calf.iso / Unix / CNews / Source / libfake / strrchr.c < prev    next >
Encoding:
C/C++ Source or Header  |  1989-05-27  |  395 b   |  23 lines
  1. /*
  2.  * strrchr - find last occurrence of a character in a string
  3.  */
  4.  
  5. #define    NULL    0
  6.  
  7. char *                /* found char, or NULL if none */
  8. strrchr(s, charwanted)
  9.  char *s;
  10. register char charwanted;
  11. {
  12.     register  char *scan;
  13.     register  char *place;
  14.  
  15.     place = NULL;
  16.     for (scan = s; *scan != '\0'; scan++)
  17.         if (*scan == charwanted)
  18.             place = scan;
  19.     if (charwanted == '\0')
  20.         return(scan);
  21.     return(place);
  22. }
  23.